home *** CD-ROM | disk | FTP | other *** search
/ Ah My Goddess / Ah My Goddess.iso / pc / stage / ending.dxr / 00003.ls < prev    next >
Encoding:
Text File  |  1997-09-08  |  628 b   |  24 lines
  1. on lfxsoundplus
  2.   global gvsoundlevel, gvslevellist
  3.   dontPassEvent()
  4.   if gvsoundlevel < 8 then
  5.     set gvsoundlevel to gvsoundlevel + 1
  6.   else
  7.     set gvsoundlevel to 8
  8.   end if
  9.   set the volume of sound 1 to getAt(gvslevellist, gvsoundlevel)
  10.   set the volume of sound 2 to getAt(gvslevellist, gvsoundlevel)
  11. end
  12.  
  13. on lfxsoundmin
  14.   global gvsoundlevel, gvslevellist
  15.   dontPassEvent()
  16.   if gvsoundlevel > 1 then
  17.     set gvsoundlevel to gvsoundlevel - 1
  18.   else
  19.     set gvsoundlevel to 1
  20.   end if
  21.   set the volume of sound 1 to getAt(gvslevellist, gvsoundlevel)
  22.   set the volume of sound 2 to getAt(gvslevellist, gvsoundlevel)
  23. end
  24.